home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / dev / misc / toolbox.lha / Toolbox / lib / lalr / Scanner.def < prev    next >
Encoding:
Text File  |  1993-03-13  |  332 b   |  15 lines
  1. (* $Id: Scanner.md,v 2.2 1992/08/07 15:28:42 grosch rel $ *)
  2.  
  3. $@ DEFINITION MODULE $;
  4.  
  5. FROM Positions    IMPORT tPosition;
  6.  
  7. TYPE tScanAttribute    = RECORD Position: tPosition; END;
  8.  
  9. VAR  Attribute        : tScanAttribute;
  10.  
  11. PROCEDURE GetToken ()    : CARDINAL;
  12. PROCEDURE ErrorAttribute (Token: CARDINAL; VAR Attribute: tScanAttribute);
  13.  
  14. $@ END $.
  15.